﻿#define _CRT_SECURE_NO_WARNINGS
#include"snake.h"

//函数的实现

//光标的位置
void SetPos(int x,int y)
{
	//获取句柄信息
	HANDLE houtput = GetStdHandle(STD_OUTPUT_HANDLE);
	//定位光标的位置
	COORD pos = { x,y };
	SetConsoleCursorPosition(houtput, pos);

}

//欢迎界面
void WelcomeToGame()
{
	SetPos(40, 14);//光标定位
	wprintf(L"欢迎来到贪吃蛇小游戏\n");
	SetPos(41, 20);
	system("pause");//程序暂停

	//进入下一个界面 要先清理屏幕
	system("cls");
	//再定位坐标 接着打印信息
	SetPos(25, 14);
	wprintf(L"用↑、↓、←、→来控制蛇的移动，按F3加速，F4减速\n");
	SetPos(25, 15);
	wprintf(L"加速能够得到更高的分数\n");

	SetPos(41, 20);
	system("pause");

	//来到第三个界面 要先清理屏幕
	system("cls");


}

void CreateMap()
{
	//上  --打印墙面
	//使用循环来打印
	int i = 0;
	for (i = 0; i < 29; i++)
	{
		wprintf(L"%lc", WALL);
	}
	//下
	//先把光标拿到下面
	SetPos(0, 26);
	for (i = 0; i < 29; i++)
	{
		wprintf(L"%lc", WALL);
	}
	//左
	for (i = 1; i <= 25; i++)
	{
		SetPos(0, i);
		wprintf(L"%lc", WALL);
	}

	//右
	for (i = 1; i <= 25; i++)
	{
		SetPos(56, i);
		wprintf(L"%lc", WALL);
	}
	
}

//初始化蛇身
void InitSnake(pSnake ps)
{
	int i = 0;
	//先创建一个节点 为空
	pSnakeNode cur = NULL;
	for (i = 0; i < 5; i++)
	{
		//动态申请一个节点的空间
		cur = (pSnakeNode)malloc(sizeof(SnakeNode));
		//判断申请的空间是否为空
		if (cur == NULL)
		{
			//提示输出一下报错信息
			perror("InitSnake()::malloc()");
			return;
		}
		//不为空
		cur->next = NULL;//不先指向下一个节点
		cur->x = POS_X + 2 * i;//让x的坐标始终在加2
		cur->y = POS_Y;

		//头插法插入链表
		if (ps->_pSnake == NULL)//链表为空的时候
		{
			//把第一个节点(蛇头)挂上链表
			ps->_pSnake = cur;
		}
		else //非空链表的时候
		{
			cur->next = ps->_pSnake;//新节点的next指向前一个节点 
			ps->_pSnake = cur;//让ps->_pSnake往后走 实则是往后插入元素 但思想却是头插
		}
	}
	cur = ps->_pSnake; //让cur指向新的头节点
	while (cur)//cur不为空就一直打印
	{
		//设置光标
		SetPos(cur->x, cur->y);
		wprintf(L"%lc", BODY);
		cur = cur->next;//往后遍历

	}

	//设置贪吃蛇的属性
	ps->_dir = RIGHT;//蛇的方向 默认向右走
	ps->_score = 0;//刚开始的总成绩
	ps->_food_weight = 10;//食物的分数
	ps->_sleep_time = 200;//休眠时间是200ms(毫秒)
	ps->_status = OK;//游戏刚开始的状态

	

}

//创建食物
void CreateFood(pSnake ps)
{
	//随机生成事物的坐标
	int x = 0;
	int y = 0;
	//x: 2~54  0~52+2  %53即可得到0~52  并且x必须是2的倍数
	//y:1~25 0~24+1
again:
	do
	{
		x = rand() % 53 + 2;
		y = rand() % 25 + 1;
	} while (x % 2 != 0);

	//x和y的坐标不能和蛇的身体坐标冲突
	//定义一个指针指向蛇头
	pSnakeNode cur = ps->_pSnake;
	while (cur)
	{
		//食物的坐标与蛇冲突
		if (x == cur->x && y == cur->y)
		{
			//再来随机生成一个坐标
			goto again;
		}
		cur = cur->next;
	}

	//开始创建食物的节点
	pSnakeNode pFood = (pSnakeNode)malloc(sizeof(SnakeNode));
	if (pFood == NULL)//如果开辟失败
	{
		perror("CreateFood()::malloc()");
		return;
	}
	pFood->x = x;
	pFood->y = y;
	pFood->next = NULL;

	SetPos(x, y);//定位到食物的位置
	wprintf(L"%lc", FOOD);

	ps->_pFood = pFood;//食物的信息放到贪吃蛇的结构体中维护起来了
}

void GameStart(pSnake ps)
{
	//0.先设置窗口的大小
	system("mode con cols=100 lines=30");
	system("title:贪吃蛇");
	// 再光标隐藏
	HANDLE houtput = GetStdHandle(STD_OUTPUT_HANDLE);//获取句柄信息
	CONSOLE_CURSOR_INFO CursorInfo;
	GetConsoleCursorInfo(houtput, &CursorInfo);//获取控制台光标信息
	CursorInfo.bVisible = false;//设置光标的可见度为0 隐藏光标
	SetConsoleCursorInfo(houtput, &CursorInfo);//设置控制台光标状态

	//1.打印欢迎界面
	//2.打印功能介绍
	WelcomeToGame();
	//3.绘制地图
	CreateMap();
	//4.创建蛇
	InitSnake(ps);//使用参数ps把修改的信息要传回到snake结构体变量中

	//5.创建食物
	CreateFood(ps);

}

void PrintHelpInfo()
{
	SetPos(64, 14);
	wprintf(L"%ls", L"不能穿墙，不能咬到自己"); 
	SetPos(64, 15);
	wprintf(L"%ls", L"用↑、↓、←、→来控制蛇的移动");
	SetPos(64, 16);
	wprintf(L"%ls", L"按F3加速，F4减速");
	SetPos(64, 17);
	wprintf(L"%ls", L"按ESC退出游戏，按空格暂停游戏");
	SetPos(64, 18);
	wprintf(L"%ls", L"wzk制作");
}

#define KEY_PRESS(vk) ((GetAsyncKeyState(vk)&1)?1:0)

void Pause()
{
	while (1)
	{
		Sleep(200);//睡眠函数
		//如果再次按空格 则就打破循环 继续游戏
		if (KEY_PRESS(VK_SPACE))
		{
			break;
		}
	}
}


int NextIsFood(pSnakeNode pn, pSnake ps)
{
	//返回1说明蛇即将到的下一个节点是食物
	//返回0则不是
	if (ps->_pFood->x == pn->x && ps->_pFood->y == pn->y)
	{
		return 1;//是食物
	}
	else
		return 0;
	//或是直接返回表达式的值 来判断是否是食物
	//return ps->_pFood->x == pn->x && ps->_pFood->y == pn->y;
}

//吃掉食物
void EatFood(pSnakeNode pn, pSnake ps)
{
	//采用头插法
	//让食物的next指针指向蛇头的位置
	ps->_pFood->next = ps->_pSnake;
	//更新一下蛇头 
	ps->_pSnake = ps->_pFood;

	//释放掉下一个位置的节点
	free(pn);
	pn = NULL;

	//创建一个指针 指向蛇头 来遍历并打印整个蛇
	pSnakeNode cur = ps->_pSnake;
	while (cur)
	{
		SetPos(cur->x, cur->y);
		wprintf(L"%lc", BODY);
		cur = cur->next;
	}
	ps->_score += ps->_food_weight;

	//重新创建食物
	CreateFood(ps);
}

//下一个节点不是食物
void NoFood(pSnakeNode pn, pSnake ps)
{
	//头插
	pn->next = ps->_pSnake;
	ps->_pSnake = pn;

	//创建一个指针 遍历整个蛇
	pSnakeNode cur = ps->_pSnake;
	while (cur->next->next != NULL)
	{
		//先把光标定位到这个位置
		SetPos(cur->x, cur->y);
		wprintf(L"%lc", BODY);
		cur = cur->next;
	}

	SetPos(cur->next->x, cur->next->y);
	printf("  ");//把最后的节点打印成空格

	//把最后一个节点释放掉
	free(cur->next);
	cur->next = NULL;
}

//检测蛇是否撞墙 -- 看蛇头的坐标
void KillByWall(pSnake ps)
{
	if (ps->_pSnake->x == 0 || ps->_pSnake->x == 56 ||
		ps->_pSnake->y == 0 || ps->_pSnake->y == 26)
	{
		//蛇撞墙了 改变蛇的状态
		ps->_status = KILL_BY_WALL;
	}
}

//检测蛇是否撞到自己 看蛇头是否与身体部分的坐标有重合 有重合的话则代表撞到自己了
void KillBySelf(pSnake ps)
{
	//把蛇头的下一个节点找到 遍历链表
	pSnakeNode cur = ps->_pSnake->next;
	while (cur)
	{
		if (cur->x == ps->_pSnake->x && cur->y == ps->_pSnake->y)
		{
			//撞到自己了 蛇的状态改变
			ps->_status = KILL_BY_SELF;
			break;
		}
		cur = cur->next;//cur指针一直向后遍历
	}
}
//蛇移动一步
void SnakeMove(pSnake ps)
{
	//动态申请一个新节点 用来表示蛇即将到的下一个节点
	pSnakeNode pNextNode = (pSnakeNode)malloc(sizeof(SnakeNode));
	//判断创建是否失败
	if (pNextNode == NULL)
	{
		perror("SnakeMove()::malloc()");
		return;
	}
	switch (ps->_dir)
	{
	case UP:
		pNextNode->x = ps->_pSnake->x;
		pNextNode->y = ps->_pSnake->y - 1;
		break;
	case DOWN:
		pNextNode->x = ps->_pSnake->x;
		pNextNode->y = ps->_pSnake->y+1 ;
		break;
	case LEFT:
		pNextNode->x = ps->_pSnake->x-2;
		pNextNode->y = ps->_pSnake->y;
		break;
	case RIGHT:
		pNextNode->x = ps->_pSnake->x+2;
		pNextNode->y = ps->_pSnake->y;
		break;
	}
	//检测下一个坐标处是否是食物
	if (NextIsFood(pNextNode, ps))
	{
		//是食物
		EatFood(pNextNode, ps);
	}
	else
	{
		//不是食物
		NoFood(pNextNode, ps);
	}

	//检测蛇是否撞墙
	KillByWall(ps); //涉及到游戏状态的修改 把ps传过去
	//检测蛇是否撞到自己
	KillBySelf(ps);

}
void GameRun(pSnake ps)
{
	//每走一步 看一下我们游戏的运行状态
	//先打印帮助信息
	PrintHelpInfo();
	do
	{
		//打印总分数和食物的分值
		SetPos(64, 10);
		printf("总分数:%d\n", ps->_score);
		SetPos(64, 11);
		printf("当前食物的分数:%2d\n", ps->_food_weight);

		if (KEY_PRESS(VK_UP) && ps->_dir != DOWN)
		{
			ps->_dir = UP;
		}
		else if (KEY_PRESS(VK_DOWN) && ps->_dir != UP)
		{
			ps->_dir = DOWN;
		}
		else if (KEY_PRESS(VK_LEFT) && ps->_dir != RIGHT)
		{
			ps->_dir = LEFT;
		}
		else if (KEY_PRESS(VK_RIGHT) && ps->_dir != LEFT)
		{
			ps->_dir = RIGHT;
		}
		else if (KEY_PRESS(VK_SPACE))
		{
			//实现暂停
			Pause();
		}
		else if (KEY_PRESS(VK_ESCAPE))
		{
			//正常退出游戏
			ps->_status = END_NORMAL;

		}
		else if (KEY_PRESS(VK_F3))
		{
			//实现加速
			if (ps->_sleep_time > 80)
			{
				ps->_sleep_time -= 30;//休眠时间减短30ms
				ps->_food_weight += 2;//食物的分数加2
			}
		}
		else if (KEY_PRESS(VK_F4))
		{
			//实现减速
			if (ps->_sleep_time < 320)
			{
				ps->_sleep_time += 30;//休眠时间增加30ms
				ps->_food_weight -= 2;//食物的分数要减2
			}
			////或是用食物的分数来控制减速
			//if (ps->_food_weight > 2)
			//{
			//	ps->_sleep_time += 30;//休眠时间增加30ms
			//	ps->_food_weight -= 2;//食物的分数要减2
			//}
		}

		//蛇移动一步的过程
		SnakeMove(ps);//蛇在移动的过程中也会影响蛇的相关属性 所以传参数ps
		//蛇走一步休息一下
		Sleep(ps->_sleep_time);
	} while (ps->_status == OK);
}

//善后工作 游戏结束
void GameEnd(pSnake ps)
{
	//定位
	SetPos(24, 12);
	//检测游戏状态
	switch (ps->_status)
	{
	case END_NORMAL:
		printf("您主动结束游戏\n");
		break;
	case KILL_BY_WALL:
		printf("您撞到了墙上，游戏结束\n");
		break;
	case KILL_BY_SELF:
		printf("您撞到了自己，游戏结束\n");
		break;
	}

	//释放蛇身的链表
	pSnakeNode cur = ps->_pSnake;
	while (cur)
	{
		//创建一个指针接收遍历链表的指针 以防指针释放 找不到下一个节点
		pSnakeNode del = cur;
		cur = cur->next;
		//先把下一个节点找到 再释放
		free(del);
	}
}